home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1995 #5 & #6
/
Amiga Plus CD - 1995 - No. 5 and 6.iso
/
pd
/
serien
/
purity
/
nr.20
/
druckertest
/
anleitung
next >
Wrap
Text File
|
1995-04-22
|
1KB
|
42 lines
Hallo Purityfans !!!
Heute mal wieder eine kleine nützliche Unit. Sie dient dazu, zu testen,
ob der Drucker online ist. Das Problem, wenn man den Drucker mit
rewrite(f,'prt:'); { VAR f:TEXT; }
writeln(f,' Druckertest ');
anspricht ist, daß wenn der Drucker nicht online ist, man dauernd die
Requester des Betriebssystems wegklicken muß.
PackMan hat in seinem Programm CD1.1 das ganz genial gelöst. Allerdings
ist das ganze ziemlich versteckt in den tausenden von Zeilen Quellkot.
Deswegen hab ich dazu diese Unit geschrieben. Die Unit erzeugt das
Verzeichnis Rogertools (damit ein bißchen Ordnung im Unitverzeichnis
herrscht) und muß deswegen nicht mit "Uses druckertest" aufgerufen werden,
sondern mit:
FROM Rogertools USES druckertest;
Sie stellt nur eine Funktion zur Verfügung:
druckbereit
Diese Booleanfunktion testet den Drucker und gibt True zurück, wenn
der Drucker online ist, oder False, wenn er nicht betriebsbereit ist.
Wenn er nicht online ist, dauert es allerdings ca. 30 Sekkunden, bis
er das bemerkt. Dann erscheint der normale Printertroublerequester,
der aber nach einmaligem Cancel - anklicken weg ist.
Hoffentlich könnt Ihr den Schnulli gebrauchen
Nick of Røgersøft [mik 14.10.93]
Besonderen Dank an Falk (PackMan) für diese geniale Funktion !